home *** CD-ROM | disk | FTP | other *** search
/ Gekkan Dennou Club 140 / Gekkan Dennou Club - 2000.1 Vol. 140 (Japan).7z / Gekkan Dennou Club - 2000.1 Vol. 140 (Japan) (Track 1).bin / autoexec.bat next >
DOS Batch File  |  1999-12-05  |  3KB  |  131 lines
  1. ECHO OFF
  2. CLS
  3. '▼旧パスの保存
  4. set opath=%path%
  5. set ozmusic=%zmusic%
  6. '▼ＣＤのパスを設定
  7. set path=\;\BIN;\SYS;\QS;\XB
  8. '▼ＣＤのシークの不具合にパッチを当てる?!
  9. set SEKP_FG=1
  10. \BIN\SEKP_CHK>nul
  11. if NOT EXITCODE 0 GOTO SEKPL1
  12.     '▼常駐していない.常駐
  13.     set SEKP_FG=0
  14.     \BIN\SEEKPAT -D>nul
  15. :SEKPL1
  16. '▼ＭＰＵキャッシュがＯＦＦでないと動かないものを設定
  17. \bin\cacheoff pic.r pi.r>nul
  18. '▼画面設定
  19. KT cncn -fct23
  20. '▼スプリアス割り込みを潰す
  21. KT SPURIOUS
  22. '▼ＣＤのＳＣＳＩＩＤを設定
  23. SETCDID>nul
  24.  
  25. '▼タイトル表示
  26. screen 1,3,1
  27. KT P -m -c -w curtain.wl -s2 \GAROU\SANPO_F5.PIC>nul
  28. KT C -C>nul
  29. KT P -m -n -w ziwa.wl -y -s3 \TTl1.PIC>nul
  30. kt wait 15>nul
  31. KT P -m -n -w ziwa.wl -y -s3 \TTl2.PIC>nul
  32. kt wait 15>nul
  33.  
  34. :SKIP0
  35. KT P -m -n -w ziwa.wl -y -s3 \TTl3.PIC>nul
  36.  
  37. '▼カレントをクイックスタートディレクトリに
  38. CD \QS
  39.  
  40. leftmchk 2048
  41. if exitcode 1 goto OM2
  42.  
  43. :M2
  44. goto OP_SKIP
  45.  
  46. :OM2
  47. '▼[[[ hit nay key ]]]アナウンス
  48. kt wait 15>nul
  49. KT P -m -n -w ziwa.wl -s1 \CONT.PIC>nul
  50. '▼S44PLAY鳴らす
  51. set INTMES=-a22,16 -i100 -m"\x1b[36mオープニング演奏中！\x1b[m"
  52. set S44PLAY=-extra -silent
  53. kt .calc "sys5=[$E8E00B].B"
  54. kt .calc "scsiex=([$ED0070].B>>3)&1"
  55. kt .mpu
  56. if %sys5% == 255 if %scsiex% == 1 scsiver||if not errorlevel 25600 goto X68000_10MHz_not_mach2
  57. if %sys5% == 255 if %mpu% == 0 goto X68000_10MHz
  58. if %sys5% == 255 if %mpu% == 3 goto Xellent30
  59. if %sys5% == 255 if %mpu% == 4 goto Jupiter40
  60. if %sys5% == 255 if %mpu% == 6 goto Jupiter60
  61. if %sys5% == 254 if %mpu% == 0 goto X68000_16MHz
  62. if %sys5% == 254 if %mpu% == 3 goto Xellent30
  63. if %sys5% == 254 if %mpu% == 4 goto Jupiter40
  64. if %sys5% == 254 if %mpu% == 6 goto Jupiter60
  65. if %sys5% == 220 if %mpu% == 3 goto X68030
  66. if %sys5% == 220 if %mpu% == 4 goto 040turbo
  67. if %sys5% == 220 if %mpu% == 6 goto 060turbo
  68. :Unknown
  69. :X68000_10MHz_not_mach2
  70. intmes %INTMES% kt rerr s44play \FMP\OP140S12.FMP>NUL
  71. goto exit
  72. :X68000_10MHz
  73. :Xellent30
  74. :Jupiter40
  75. :Jupiter60
  76. intmes %INTMES% kt rerr s44play \FMP\OP140S15.FMP>NUL
  77. goto exit
  78. :X68000_16MHz
  79. :040turbo
  80. intmes %INTMES% kt rerr s44play \FMP\OP140S20.FMP>NUL
  81. goto exit
  82. :X68030
  83. :060turbo
  84. intmes %INTMES% kt rerr s44play \FMP\OP140S27.FMP>NUL
  85. goto exit
  86. :exit
  87. set mpu=
  88. set scsiex=
  89. set sys5=
  90. set S44PLAY=
  91. set INTMES=
  92.  
  93. :OP_SKIP
  94.  
  95. :SKIP1
  96. '▼Ｚ-ＭＵＳＩＣの曲のあるところ
  97. SET zmusic=\MUSIC
  98. PCM8
  99. ZMUSIC -G
  100.  
  101. '▼dshellの起動
  102. DSHELL MOKUJI.DOC /T"電脳倶楽部 2000年1月号（第140号）" /0-4196 /1-B4B6
  103. '▼おしまいのメッセージ出す
  104. '▼終わってからの処理
  105. ZMUSIC -R>nul
  106. '▼PCM8の取り外し
  107. PCM8 -R>nul
  108. \bin\cacheoff -r>nul
  109. if NOT "%SEKP_FG%" == "0" GOTO SEKPL2
  110.     '▼起動時,常駐していなかったので...
  111.     \BIN\SEEKPAT -r>nul
  112. :SEKPL2
  113. '画面クリア
  114. SCREEN 0
  115. '▼コンソール設定
  116. kt cncn
  117. '▼パスを戻す
  118. SET path=%opath%
  119. SET zmusic=%ozmusic%
  120. if NOT %zmusic% == %%zmusic%% GOTO ZML1
  121.     SET zmusic=
  122. :ZML1
  123. '▼いらない環境変数を初期化
  124. SET opath=
  125. SET SEKP_FG=
  126. SET ozmusic=
  127. SET CNCNF=
  128. SET CNHLP=
  129. '▼ルートをカレントに
  130. CD \
  131.